1 REM TURTLE-DEMO: 'VIERECK'
2 REM N. HEUSLER 11.91
3 :
10 SYS49152
20 INPUT"WINKEL   89[157][157][157][157]";AN
30 !INIT:!GRAPHICS:SZ=75
40 !PEN0:!MOVE160+SZ,100+SZ:!PEN1
50 D=SZ*2
60 !WALKD:D=D-1:!TURNLAN:IFD>1THEN60
70 !FINISH